home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 April: Mac OS SDK / Dev.CD Apr 97 SDK1.toast / Development Kits (Disc 1) / AppleScript / Development Tools / Interfaces / AppleScript 1.1 Interfaces / AIncludes / AERegistry.a next >
Encoding:
Text File  |  1995-01-27  |  11.3 KB  |  478 lines  |  [TEXT/MPS ]
  1. ; Created: 2:40 PM Thu, 18 Feb 1993
  2. ; File: AERegistry.a
  3. ;
  4. ; Modified: Tue, Nov 30, 1993 01:14:18
  5. ;
  6. ; Assembler Interface to the Apple Event Registry
  7. ; Copyright Apple Computer, Inc. 1993
  8. ; All Rights Reserved
  9. ;
  10. ;--------------------------------------------------------------------
  11.  
  12.     IF &TYPE('__INCLUDINGAEREGISTRY__') = 'UNDEFINED' THEN
  13. __INCLUDINGAEREGISTRY__    SET    1
  14.  
  15.  IF &TYPE('__INCLUDINGAPPLEEVENTS__') = 'UNDEFINED' THEN
  16.  INCLUDE 'AppleEvents.a'
  17.  ENDIF
  18.  
  19. cAEList    EQU    'list'
  20. cApplication    EQU    'capp'
  21. cArc    EQU    'carc'
  22. cBoolean    EQU    'bool'
  23. cCell    EQU    'ccel'
  24. cChar    EQU    'cha '
  25. cColorTable    EQU    'clrt'
  26. cColumn    EQU    'ccol'
  27. cDocument    EQU    'docu'
  28. cDrawingArea    EQU    'cdrw'
  29. cEnumeration    EQU    'enum'
  30. cFile    EQU    'file'
  31. cFixed    EQU    'fixd'
  32. cFixedPoint    EQU    'fpnt'
  33. cFixedRectangle    EQU    'frct'
  34. cGraphicLine    EQU    'glin'
  35. cGraphicObject    EQU    'cgob'
  36. cGraphicShape    EQU    'cgsh'
  37. cGraphicText    EQU    'cgtx'
  38. cGroupedGraphic    EQU    'cpic'
  39. cInsertionLoc    EQU    'insl'
  40. cInsertionPoint    EQU    'cins'
  41. cIntlText    EQU    'itxt'
  42. cIntlWritingCode    EQU    'intl'
  43. cItem    EQU    'citm'
  44. cLine    EQU    'clin'
  45. cLongDateTime    EQU    'ldt '
  46. cLongFixed    EQU    'lfxd'
  47. cLongFixedPoint    EQU    'lfpt'
  48. cLongFixedRectangle    EQU    'lfrc'
  49. cLongInteger    EQU    'long'
  50. cLongPoint    EQU    'lpnt'
  51. cLongRectangle    EQU    'lrct'
  52. cMachineLoc    EQU    'mLoc'
  53. cMenu    EQU    'cmnu'
  54. cMenuItem    EQU    'cmen'
  55. cObject    EQU    'cobj'
  56. cObjectSpecifier    EQU    'obj '
  57. cOpenableObject    EQU    'coob'
  58. cOval    EQU    'covl'
  59. cParagraph    EQU    'cpar'
  60. cPICT    EQU    'PICT'
  61. cPixel    EQU    'cpxl'
  62. cPixelMap    EQU    'cpix'
  63. cPolygon    EQU    'cpgn'
  64. cProperty    EQU    'prop'
  65. cQDPoint    EQU    'QDpt'
  66. cQDRectangle    EQU    'qdrt'
  67. cRectangle    EQU    'crec'
  68. cRGBColor    EQU    'cRGB'
  69. cRotation    EQU    'trot'
  70. cRoundedRectangle    EQU    'crrc'
  71. cRow    EQU    'crow'
  72. cSelection    EQU    'csel'
  73. cShortInteger    EQU    'shor'
  74. cTable    EQU    'ctbl'
  75. cText    EQU    'ctxt'
  76. cTextFlow    EQU    'cflo'
  77. cTextStyles    EQU    'tsty'
  78. cType    EQU    'type'
  79. cVersion    EQU    'vers'
  80. cWindow    EQU    'cwin'
  81. cWord    EQU    'cwor'
  82. enumArrows    EQU    'arro'
  83. enumJustification    EQU    'just'
  84. enumKeyForm    EQU    'kfrm'
  85. enumPosition    EQU    'posi'
  86. enumProtection    EQU    'prtn'
  87. enumQuality    EQU    'qual'
  88. enumSaveOptions    EQU    'savo'
  89. enumStyle    EQU    'styl'
  90. enumTransferMode    EQU    'tran'
  91. errAEBadKeyForm    EQU    -10002
  92. errAECantHandleClass    EQU    -10010
  93. errAECantSupplyType    EQU    -10009
  94. errAECantUndo    EQU    -10015
  95. errAEEventFailed    EQU    -10000
  96. errAEIndexTooLarge    EQU    -10007
  97. errAEInTransaction    EQU    -10011
  98. errAELocalOnly    EQU    -10016
  99. errAENoSuchTransaction    EQU    -10012
  100. errAENotAnElement    EQU    -10008
  101. errAENotASingleObject    EQU    -10014
  102. errAENotModifiable    EQU    -10003
  103. errAENoUserSelection    EQU    -10013
  104. errAEPrivilegeError    EQU    -10004
  105. errAEReadDenied    EQU    -10005
  106. errAETypeError    EQU    -10001
  107. errAEWriteDenied    EQU    -10006
  108. formUniqueID    EQU    'ID  '
  109. kAEAbout    EQU    'abou'
  110. kAEAfter    EQU    'afte'
  111. kAEAliasSelection    EQU    'sali'
  112. kAEAllCaps    EQU    'alcp'
  113. kAEArrowAtEnd    EQU    'aren'
  114. kAEArrowAtStart    EQU    'arst'
  115. kAEArrowBothEnds    EQU    'arbo'
  116. kAEAsk    EQU    'ask '
  117. kAEBefore    EQU    'befo'
  118. kAEBeginning    EQU    'bgng'
  119. kAEBeginsWith    EQU    'bgwt'
  120. kAEBeginTransaction    EQU    'begi'
  121. kAEBold    EQU    'bold'
  122. kAECaseSensEquals    EQU    'cseq'
  123. kAECentered    EQU    'cent'
  124. kAEChangeView    EQU    'view'
  125. kAEClone    EQU    'clon'
  126. kAEClose    EQU    'clos'
  127. kAECondensed    EQU    'cond'
  128. kAEContains    EQU    'cont'
  129. kAECopy    EQU    'copy'
  130. kAECoreSuite    EQU    'core'
  131. kAECountElements    EQU    'cnte'
  132. kAECreateElement    EQU    'crel'
  133. kAECreatePublisher    EQU    'cpub'
  134. kAECut    EQU    'cut '
  135. kAEDelete    EQU    'delo'
  136. kAEDoObjectsExist    EQU    'doex'
  137. kAEDoScript    EQU    'dosc'
  138. kAEDrag    EQU    'drag'
  139. kAEDuplicateSelection    EQU    'sdup'
  140. kAEEditGraphic    EQU    'edit'
  141. kAEEmptyTrash    EQU    'empt'
  142. kAEEnd    EQU    'end '
  143. kAEEndsWith    EQU    'ends'
  144. kAEEndTransaction    EQU    'endt'
  145. kAEEquals    EQU    '=   '
  146. kAEExpanded    EQU    'pexp'
  147. kAEFast    EQU    'fast'
  148. kAEFinderEvents    EQU    'FNDR'
  149. kAEFormulaProtect    EQU    'fpro'
  150. kAEFullyJustified    EQU    'full'
  151. kAEGetClassInfo    EQU    'qobj'
  152. kAEGetData    EQU    'getd'
  153. kAEGetDataSize    EQU    'dsiz'
  154. kAEGetEventInfo    EQU    'gtei'
  155. kAEGetInfoSelection    EQU    'sinf'
  156. kAEGetPrivilegeSelection    EQU    'sprv'
  157. kAEGetSuiteInfo    EQU    'gtsi'
  158. kAEGreaterThan    EQU    '>   '
  159. kAEGreaterThanEquals    EQU    '>=  '
  160. kAEGrow    EQU    'grow'
  161. kAEHidden    EQU    'hidn'
  162. kAEHiQuality    EQU    'hiqu'
  163. kAEImageGraphic    EQU    'imgr'
  164. kAEInfo    EQU    11
  165. kAEIsUniform    EQU    'isun'
  166. kAEItalic    EQU    'ital'
  167. kAELeftJustified    EQU    'left'
  168. kAELessThan    EQU    '<   '
  169. kAELessThanEquals    EQU    '<=  '
  170. kAELowercase    EQU    'lowc'
  171. kAEMain    EQU    0
  172. kAEMakeObjectsVisible    EQU    'mvis'
  173. kAEMiscStandards    EQU    'misc'
  174. kAEModifiable    EQU    'modf'
  175. kAEMove    EQU    'move'
  176. kAENo    EQU    'no  '
  177. kAENoArrow    EQU    'arno'
  178. kAENonmodifiable    EQU    'nmod'
  179. kAEOpen    EQU    'odoc'
  180. kAEOpenSelection    EQU    'sope'
  181. kAEOutline    EQU    'outl'
  182. kAEPageSetup    EQU    'pgsu'
  183. kAEPaste    EQU    'past'
  184. kAEPlain    EQU    'plan'
  185. kAEPrint    EQU    'pdoc'
  186. kAEPrintSelection    EQU    'spri'
  187. kAEPrintWindow    EQU    'pwin'
  188. kAEPutAwaySelection    EQU    'sput'
  189. kAEQDAddOver    EQU    'addo'
  190. kAEQDAddPin    EQU    'addp'
  191. kAEQDAdMax    EQU    'admx'
  192. kAEQDAdMin    EQU    'admn'
  193. kAEQDBic    EQU    'bic '
  194. kAEQDBlend    EQU    'blnd'
  195. kAEQDCopy    EQU    'cpy '
  196. kAEQDNotBic    EQU    'nbic'
  197. kAEQDNotCopy    EQU    'ncpy'
  198. kAEQDNotOr    EQU    'ntor'
  199. kAEQDNotXor    EQU    'nxor'
  200. kAEQDOr    EQU    'or  '
  201. kAEQDSubOver    EQU    'subo'
  202. kAEQDSubPin    EQU    'subp'
  203. kAEQDSupplementalSuite    EQU    'qdsp'
  204. kAEQDXor    EQU    'xor '
  205. kAEQuickdrawSuite    EQU    'qdrw'
  206. kAERedo    EQU    'redo'
  207. kAERegular    EQU    'regl'
  208. kAEReplace    EQU    'rplc'
  209. kAERequiredSuite    EQU    'reqd'
  210. ;kAERestart    EQU    'rest'    ;already defined in AppleEvents.a
  211. kAERevealSelection    EQU    'srev'
  212. kAERevert    EQU    'rvrt'
  213. kAERightJustified    EQU    'rght'
  214. kAESave    EQU    'save'
  215. kAESelect    EQU    'slct'
  216. kAESetData    EQU    'setd'
  217. kAESetPosition    EQU    'posn'
  218. kAEShadow    EQU    'shad'
  219. kAESharing    EQU    13
  220. kAEShowClipboard    EQU    'shcl'
  221. ;kAEShutDown    EQU    'shut'    ;already defined in AppleEvents.a
  222. kAESleep    EQU    'slep'
  223. kAESmallCaps    EQU    'smcp'
  224. kAESpecialClassProperties    EQU    'c@#!'
  225. kAEStrikethrough    EQU    'strk'
  226. kAESubscript    EQU    'sbsc'
  227. kAESuperscript    EQU    'spsc'
  228. kAETableSuite    EQU    'tbls'
  229. kAETextSuite    EQU    'TEXT'
  230. kAETransactionTerminated    EQU    'ttrm'
  231. kAEUnderline    EQU    'undl'
  232. kAEUndo    EQU    'undo'
  233. kAEWholeWordEquals    EQU    'wweq'
  234. kAEYes    EQU    'yes '
  235. kAEZoom    EQU    'zoom'
  236. kByCommentView    EQU    6
  237. kByDateView    EQU    3
  238. kByIconView    EQU    1
  239. kByKindView    EQU    5
  240. kByLabelView    EQU    7
  241. kByNameView    EQU    2
  242. kBySizeView    EQU    4
  243. kBySmallIcon    EQU    0
  244. kByVersionView    EQU    8
  245. keyAEAngle    EQU    'kang'
  246. keyAEArcAngle    EQU    'parc'
  247. keyAEBaseAddr    EQU    'badd'
  248. keyAEBestType    EQU    'pbst'
  249. keyAEBgndColor    EQU    'kbcl'
  250. keyAEBgndPattern    EQU    'kbpt'
  251. keyAEBounds    EQU    'pbnd'
  252. keyAECellList    EQU    'kclt'
  253. keyAEClassID    EQU    'clID'
  254. keyAEColor    EQU    'colr'
  255. keyAEColorTable    EQU    'cltb'
  256. keyAECurveHeight    EQU    'kchd'
  257. keyAECurveWidth    EQU    'kcwd'
  258. keyAEDashStyle    EQU    'pdst'
  259. keyAEData    EQU    'data'
  260. keyAEDefaultType    EQU    'deft'
  261. keyAEDefinitionRect    EQU    'pdrt'
  262. keyAEDescType    EQU    'dstp'
  263. keyAEDestination    EQU    'dest'
  264. keyAEDoAntiAlias    EQU    'anta'
  265. keyAEDoDithered    EQU    'gdit'
  266. keyAEDoRotate    EQU    'kdrt'
  267. keyAEDoScale    EQU    'ksca'
  268. keyAEDoTranslate    EQU    'ktra'
  269. keyAEEditionFileLoc    EQU    'eloc'
  270. keyAEElements    EQU    'elms'
  271. keyAEEndPoint    EQU    'pend'
  272. keyAEEventClass    EQU    'evcl'
  273. keyAEEventID    EQU    'evti'
  274. keyAEFile    EQU    'kfil'
  275. keyAEFileType    EQU    'fltp'
  276. keyAEFillColor    EQU    'flcl'
  277. keyAEFillPattern    EQU    'flpt'
  278. keyAEFlipHorizontal    EQU    'kfho'
  279. keyAEFlipVertical    EQU    'kfvt'
  280. keyAEFont    EQU    'font'
  281. keyAEFormula    EQU    'pfor'
  282. keyAEGraphicObjects    EQU    'gobs'
  283. keyAEID    EQU    'ID  '
  284. keyAEImageQuality    EQU    'gqua'
  285. keyAEInsertHere    EQU    'insh'
  286. keyAEKeyForms    EQU    'keyf'
  287. keyAEKeyword    EQU    'kywd'
  288. keyAELevel    EQU    'levl'
  289. keyAELineArrow    EQU    'arro'
  290. keyAEName    EQU    'pnam'
  291. keyAENewElementLoc    EQU    'pnel'
  292. keyAEObject    EQU    'kobj'
  293. keyAEObjectClass    EQU    'kocl'
  294. keyAEOffStyles    EQU    'ofst'
  295. keyAEOnStyles    EQU    'onst'
  296. keyAEParameters    EQU    'prms'
  297. keyAEParamFlags    EQU    'pmfg'
  298. keyAEPenColor    EQU    'ppcl'
  299. keyAEPenPattern    EQU    'pppa'
  300. keyAEPenWidth    EQU    'ppwd'
  301. keyAEPixelDepth    EQU    'pdpt'
  302. keyAEPixMapMinus    EQU    'kpmm'
  303. keyAEPMTable    EQU    'kpmt'
  304. keyAEPointList    EQU    'ptlt'
  305. keyAEPointSize    EQU    'ptsz'
  306. keyAEPosition    EQU    'kpos'
  307. keyAEPropData    EQU    'prdt'
  308. keyAEProperties    EQU    'qpro'
  309. keyAEProperty    EQU    'kprp'
  310. keyAEPropFlags    EQU    'prfg'
  311. keyAEPropID    EQU    'prop'
  312. keyAEProtection    EQU    'ppro'
  313. keyAERenderAs    EQU    'kren'
  314. keyAERequestedType    EQU    'rtyp'
  315. keyAEResult    EQU    '----'
  316. keyAEResultInfo    EQU    'rsin'
  317. keyAERotation    EQU    'prot'
  318. keyAERotPoint    EQU    'krtp'
  319. keyAERowList    EQU    'krls'
  320. keyAESaveOptions    EQU    'savo'
  321. keyAEScale    EQU    'pscl'
  322. keyAEScriptTag    EQU    'psct'
  323. keyAEShowWhere    EQU    'show'
  324. keyAEStartAngle    EQU    'pang'
  325. keyAEStartPoint    EQU    'pstp'
  326. keyAEStyles    EQU    'ksty'
  327. keyAESuiteID    EQU    'suit'
  328. keyAEText    EQU    'ktxt'
  329. keyAETextColor    EQU    'ptxc'
  330. keyAETextFont    EQU    'ptxf'
  331. keyAETextPointSize    EQU    'ptps'
  332. keyAETextStyles    EQU    'txst'
  333. keyAETheText    EQU    'thtx'
  334. keyAETransferMode    EQU    'pptm'
  335. keyAETranslation    EQU    'ptrs'
  336. keyAETryAsStructGraf    EQU    'toog'
  337. keyAEUniformStyles    EQU    'ustl'
  338. keyAEUpdateOn    EQU    'pupd'
  339. keyAEUserTerm    EQU    'utrm'
  340. keyAEWindow    EQU    'wndw'
  341. keyAEWritingCode    EQU    'wrcd'
  342. keyMiscellaneous    EQU    'fmsc'
  343. keySelection    EQU    'fsel'
  344. keyWindow    EQU    'kwnd'
  345. pArcAngle    EQU    'parc'
  346. pBackgroundColor    EQU    'pbcl'
  347. pBackgroundPattern    EQU    'pbpt'
  348. pBestType    EQU    'pbst'
  349. pBounds    EQU    'pbnd'
  350. pClass    EQU    'pcls'
  351. pClipboard    EQU    'pcli'
  352. pColor    EQU    'colr'
  353. pColorTable    EQU    'cltb'
  354. pContents    EQU    'pcnt'
  355. pCornerCurveHeight    EQU    'pchd'
  356. pCornerCurveWidth    EQU    'pcwd'
  357. pDashStyle    EQU    'pdst'
  358. pDefaultType    EQU    'deft'
  359. pDefinitionRect    EQU    'pdrt'
  360. pEnabled    EQU    'enbl'
  361. pEndPoint    EQU    'pend'
  362. pFillColor    EQU    'flcl'
  363. pFillPattern    EQU    'flpt'
  364. pFont    EQU    'font'
  365. pFormula    EQU    'pfor'
  366. pGraphicObjects    EQU    'gobs'
  367. pHasCloseBox    EQU    'hclb'
  368. pHasTitleBar    EQU    'ptit'
  369. pID    EQU    'ID  '
  370. pIndex    EQU    'pidx'
  371. pInsertionLoc    EQU    'pins'
  372. pIsFloating    EQU    'isfl'
  373. pIsFrontProcess    EQU    'pisf'
  374. pIsModal    EQU    'pmod'
  375. pIsModified    EQU    'imod'
  376. pIsResizable    EQU    'prsz'
  377. pIsStationeryPad    EQU    'pspd'
  378. pIsZoomable    EQU    'iszm'
  379. pIsZoomed    EQU    'pzum'
  380. pItemNumber    EQU    'itmn'
  381. pJustification    EQU    'pjst'
  382. pLineArrow    EQU    'arro'
  383. pMenuID    EQU    'mnid'
  384. pName    EQU    'pnam'
  385. pNewElementLoc    EQU    'pnel'
  386. pPenColor    EQU    'ppcl'
  387. pPenPattern    EQU    'pppa'
  388. pPenWidth    EQU    'ppwd'
  389. pPixelDepth    EQU    'pdpt'
  390. pPointList    EQU    'ptlt'
  391. pPointSize    EQU    'ptsz'
  392. pProtection    EQU    'ppro'
  393. pRotation    EQU    'prot'
  394. pScale    EQU    'pscl'
  395. pScript    EQU    'scpt'
  396. pScriptTag    EQU    'psct'
  397. pSelected    EQU    'selc'
  398. pSelection    EQU    'sele'
  399. pStartAngle    EQU    'pang'
  400. pStartPoint    EQU    'pstp'
  401. pTextColor    EQU    'ptxc'
  402. pTextFont    EQU    'ptxf'
  403. pTextItemDelimiters    EQU    'txdl'
  404. pTextPointSize    EQU    'ptps'
  405. pTextStyles    EQU    'txst'
  406. pTransferMode    EQU    'pptm'
  407. pTranslation    EQU    'ptrs'
  408. pUniformStyles    EQU    'ustl'
  409. pUpdateOn    EQU    'pupd'
  410. pUserSelection    EQU    'pusl'
  411. pVersion    EQU    'vers'
  412. pVisible    EQU    'pvis'
  413. typeAEText    EQU    'tTXT'
  414. typeArc    EQU    'carc'
  415. typeBest    EQU    'best'
  416. typeCell    EQU    'ccel'
  417. typeClassInfo    EQU    'gcli'
  418. typeColorTable    EQU    'clrt'
  419. typeColumn    EQU    'ccol'
  420. typeDashStyle    EQU    'tdas'
  421. typeData    EQU    'tdta'
  422. typeDrawingArea    EQU    'cdrw'
  423. typeElemInfo    EQU    'elin'
  424. typeEnumeration    EQU    'enum'
  425. typeEPS    EQU    'EPS '
  426. typeEventInfo    EQU    'evin'
  427. typeFinderWindow    EQU    'fwin'
  428. typeFixed    EQU    'fixd'
  429. typeFixedPoint    EQU    'fpnt'
  430. typeFixedRectangle    EQU    'frct'
  431. typeGraphicLine    EQU    'glin'
  432. typeGraphicText    EQU    'cgtx'
  433. typeGroupedGraphic    EQU    'cpic'
  434. typeInsertionLoc    EQU    'insl'
  435. typeIntlText    EQU    'itxt'
  436. typeIntlWritingCode    EQU    'intl'
  437. typeLongDateTime    EQU    'ldt '
  438. typeLongFixed    EQU    'lfxd'
  439. typeLongFixedPoint    EQU    'lfpt'
  440. typeLongFixedRectangle    EQU    'lfrc'
  441. typeLongPoint    EQU    'lpnt'
  442. typeLongRectangle    EQU    'lrct'
  443. typeMachineLoc    EQU    'mLoc'
  444. typeOval    EQU    'covl'
  445. typeParamInfo    EQU    'pmin'
  446. typePict    EQU    'PICT'
  447. typePixelMap    EQU    'cpix'
  448. typePixMapMinus    EQU    'tpmm'
  449. typePolygon    EQU    'cpgn'
  450. typePropInfo    EQU    'pinf'
  451. typeQDPoint    EQU    'QDpt'
  452. typeQDRectangle    EQU    'qdrt'
  453. typeRectangle    EQU    'crec'
  454. typeRGB16    EQU    'tr16'
  455. typeRGB96    EQU    'tr96'
  456. typeRGBColor    EQU    'cRGB'
  457. typeRotation    EQU    'trot'
  458. typeRoundedRectangle    EQU    'crrc'
  459. typeRow    EQU    'crow'
  460. typeScrapStyles    EQU    'styl'
  461. typeScript    EQU    'scpt'
  462. typeStyledText    EQU    'STXT'
  463. typeSuiteInfo    EQU    'suin'
  464. typeTable    EQU    'ctbl'
  465. typeTextStyles    EQU    'tsty'
  466. typeTIFF    EQU    'TIFF'
  467. typeVersion    EQU    'vers'
  468. zoomIn    EQU    7
  469. zoomOut    EQU    8
  470.  
  471. ; WritingCode structure
  472. theScriptCode    EQU 0        ; ScriptCode [short]
  473. theLangCode        EQU 2        ; LangCode [short]
  474.  
  475. ; Additional IntlText structure
  476. theText            EQU 4        ; variable number of characters
  477.  
  478.     ENDIF    ; ...already included